(*---------------------------------------------------------------------------
    :Program.    Beep
    :Author.     Fridtjof Siebert
    :Address.    Nobileweg 67, D-7-Stgt-40
    :Shortcut.   [fbs]
    :Version.    3.141593
    :Date.       15-Dez-88
    :Copyright.  PD
    :Language.   Modula-II
    :Translator. M2Amiga
    :Contents.   Procedure to "Beep"
---------------------------------------------------------------------------*)

DEFINITION MODULE Beep;

(*------  Beep:  ------*)

PROCEDURE Beep(low: BOOLEAN);

(* :input.    low: low beep or high beep?                                  *)
(* :semantic. Creates a Beep-Sound to indicate errors etc.                 *)

END Beep.
